3 INPUT"[147]WIDTH 1 OR 2";WI$
4 IF VAL(WI$)<1OR VAL(WI$)>2 THEN3
5 POKE2,VAL(WI$)
10 I=52224
20 READ A:IF A=256 THEN 40
25 PRINT"[147]ENTERING DATA":POKE646,A
30 POKE I,A:I=I+1:CH=CH+A:GOTO 20
40 IF CH<>60660 THENPRINT"ERROR IN DATA STATEMENTS":END
50 PRINT"SYS 52224 TO START DUMP":END
52224 DATA 173,0,221,41,3,73
52230 DATA 3,160,6,10,136,208
52236 DATA 252,141,132,3,173,24
52242 DATA 208,41,8,240,9,24
52248 DATA 169,32,109,132,3,141
52254 DATA 132,3,169,0,32,189
52260 DATA 255,169,4,170,160,255
52266 DATA 32,186,255,32,192,255
52272 DATA 162,4,32,201,255,176
52278 DATA 3,76,61,204,76,32
52284 DATA 205,169,8,32,210,255
52290 DATA 169,13,32,210,255,162
52296 DATA 0,169,1,141,198,205
52302 DATA 169,0,141,199,205,169
52308 DATA 0,141,200,205,169,199
52314 DATA 141,201,205,32,225,255
52320 DATA 208,3,76,32,205,138
52326 DATA 72,152,72,32,41,205
52332 DATA 104,168,104,170,173,205
52338 DATA 205,45,203,205,240,12
52344 DATA 173,202,205,13,198,205
52350 DATA 141,202,205,76,143,204
52356 DATA 173,198,205,73,255,45
52362 DATA 202,205,141,202,205,14
52368 DATA 198,205,173,198,205,201
52374 DATA 128,240,20,24,173,199
52380 DATA 205,105,1,141,199,205
52386 DATA 173,200,205,105,0,141
52392 DATA 200,205,76,93,204,173
52398 DATA 202,205,9,128,224,45
52404 DATA 144,10,173,202,205,41
52410 DATA 31,9,128,141,202,205
52416 DATA 142,207,205,166,2,142
52422 DATA 206,205,168,32,210,255
52428 DATA 152,206,206,205,208,246
52434 DATA 174,207,205,169,1,141
52440 DATA 198,205,169,0,141,202
52446 DATA 205,56,173,199,205,233
52452 DATA 6,141,199,205,173,200
52458 DATA 205,233,0,141,200,205
52464 DATA 206,201,205,173,201,205
52470 DATA 201,255,240,3,76,93
52476 DATA 204,224,45,176,31,24
52482 DATA 173,199,205,105,7,141
52488 DATA 199,205,173,200,205,105
52494 DATA 0,141,200,205,232,169
52500 DATA 199,141,201,205,169,13
52506 DATA 32,210,255,76,93,204
52512 DATA 169,13,32,210,255,32
52518 DATA 231,255,96,173,201,205
52524 DATA 41,7,141,204,205,173
52530 DATA 201,205,74,74,74,168
52536 DATA 185,146,205,133,251,185
52542 DATA 172,205,133,252,24,165
52548 DATA 251,109,204,205,133,251
52554 DATA 165,252,105,0,133,252
52560 DATA 24,173,132,3,101,252
52566 DATA 133,252,173,199,205,41
52572 DATA 7,73,7,168,200,169
52578 DATA 0,56,42,136,208,252
52584 DATA 141,203,205,24,173,200
52590 DATA 205,101,252,133,252,173
52596 DATA 199,205,41,248,168,138
52602 DATA 72,120,162,52,134,1
52608 DATA 177,251,162,55,134,1
52614 DATA 88,168,104,170,152,45
52620 DATA 203,205,141,205,205,96
52626 DATA 0,64,128,192,0,64
52632 DATA 128,192,0,64,128,192
52638 DATA 0,64,128,192,0,64
52644 DATA 128,192,0,64,128,192
52650 DATA 0,64,0,1,2,3
52656 DATA 5,6,7,8,10,11
52662 DATA 12,13,15,16,17,18
52668 DATA 20,21,22,23,25,26
52674 DATA 27,28,30,31,256